home *** CD-ROM | disk | FTP | other *** search
/ Stuart Little 2 Press Kit / Stuart Little 2 Press Kit.iso / pc / SL2.dxr / Internal_3_Variables Initialization.ls < prev    next >
Encoding:
Text File  |  2002-06-24  |  1.3 KB  |  40 lines
  1. on enterFrame
  2.   global gLOGO1, gLOGO2, gSHEET, gPNOTES, oneFileCopy, gSavePath, gSysOS, gHardDrive, gSysPath, gSourceDrive, gSystemOS, gLF, gfd, gDefaultSourcePath, gImages, gMegs, gmacSavePath, gWinSavePath, gDefaultSavePath
  3.   gImages = 0
  4.   gMegs = 0
  5.   gSourceDrive = the moviePath
  6.   oneFileCopy = new(xtra("ProgressCopy"), 1, 0, 0)
  7.   gSystemOS = baVersion("os")
  8.   if char 1 to 9 of the platform = "Macintosh" then
  9.     gfd = ":"
  10.     gLF = RETURN
  11.   else
  12.     gfd = "\"
  13.     gLF = RETURN & numToChar(10)
  14.   end if
  15.   gSysPath = getOSDirectory()
  16.   if gfd = ":" then
  17.     the itemDelimiter = ":"
  18.   else
  19.     the itemDelimiter = "\"
  20.   end if
  21.   gHardDrive = item 1 of gSysPath
  22.   the itemDelimiter = ","
  23.   save = the itemDelimiter
  24.   if gfd = ":" then
  25.     gmacSavePath = baSysFolder("desktop")
  26.     gDefaultSavePath = gmacSavePath & "Stuart Little 2 Images"
  27.     gDefaultSourcePath = gSourceDrive & "Media"
  28.   else
  29.     if gSystemOS = "Win95" then
  30.       gWinSavePath = gHardDrive & "\Windows\Desktop\"
  31.       gDefaultSavePath = gWinSavePath & "Stuart Little 2 Images"
  32.       gDefaultSourcePath = gSourceDrive & "Media"
  33.     else
  34.       gWinSavePath = baSysFolder("common desktop")
  35.       gDefaultSavePath = gWinSavePath & "Stuart Little 2 Images"
  36.       gDefaultSourcePath = gSourceDrive & "Media"
  37.     end if
  38.   end if
  39. end
  40.